Type TWheel
	Field mesh[4]
End Type 



Function TWheel_CreateWheel( p_pivot, pf_RPosx#=0.0, pf_RPosy#=0.0, pf_RPosz#=0.0 )
	Local l_mesh=CreateCylinder(7,True,p_pivot) 
	
	PositionEntity l_mesh, pf_RPosx, pf_RPosy, pf_RPosz	
	ScaleMesh l_mesh,0.5,0.5,0.5
	EntityColor l_mesh,60,60,60
	Cel_Shade( l_mesh,0.2 )
	TurnEntity l_mesh, 0,0,90
	
	Return l_mesh
End Function 

;~IDEal Editor Parameters:
;~C#Blitz3D